﻿Public Class clsLog
    Public Function insert(log_type As String, item As String, itemvalue As String) As Integer
        Dim sql As String = "INSERT INTO sf.b_log(log_time, log_type, item, itemvalue) VALUES ((SELECT CURRENT_TIMESTAMP(6)),?, ?, ?)"
        Return DBacs.ExecuteUpdateSql(sql, -1, log_type, item, itemvalue)
    End Function
End Class
